unit StarMessageBoxInterface;

interface

type
  IStarMessageBox=interface
    ['{D1D3BFC4-481E-4D09-84F0-3F7B39A23520}']
    procedure ShowMessage(ACaption, APrompt:string);
    procedure ShowError(ACaption, APrompt:string);
    procedure ShowWarning(ACaption, APrompt:string);
  end;

implementation

end.
